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«REM > 



IDENTIFICATIQM 



PRODUCT CQDE2 AC-E715I-MC 

PRODUCT NAMES CXOQAIO DQll DEC/Xll MODULE 

DATES SEPTEMBER 1978 

MkirnkWERt DEC/Xll SUPPORT GROUP 

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE 
HITHOUT NOTICE AID SHOULD NOT BE CONSTRUED AS A COMMITMENT 
BY DIGITAL EQUIPMEliT CORPORATIQM- DIGITAL EQUIPMENT 
CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS THAT 
MAY APPEAR IN THIS MANUAL, 

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER 
SYSTEM AND CAN BE COPIED (MITH INCLUSION OF DIGITALS 
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 
OTHERMISE BE PROVIDED IN WRITING BY DIGITAL^ 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR 
THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS 
NOT SUPPLIED BY DIGITAL, 

COPYRIGHT (C) 1973,1978 DIGITAL EQUIPMENT CORPORATION 
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1- ABSTRACT 

DQA IS AH lOMOD THAT WILL EXERCISE OP TO EIGHT DQllS, DURI^'G 1 SIMGLE 

PASS IT MILL DO 15 CHARACTER TRANSFERS OF SEQUEHTIAL 

DATA AND CHECK THE STATUS REGISTERS Af^D SECOf^DARY REGISTERS, 

IT HILL TRANSFER A 256 EIGHT BIT BIllRY COUNT PATTERN 128 TIMES FOR 
EACH END PASS RECORDED* km ERRORS DETECTED DURING THE 
PASS ARE REPORTED ON THE CONSOLE TTY, 

2, REQUIREMENTS 



HARDWARES ONLY THE BASIC UNIT IS EXERCISED; SO 

A BASIC UNIT IS NEEDED, ANY EXTRA OPTIONS DM 
THE DQll WILL NOT BE EXERCISED. 

STORAGES 5 DQA REQUIRES; 

1, DECIHAL WORDS S 768 
2« OCTAL HORDS: 1400 
3. OCTAL BYTES 2 3000 



3, PASS DEFINITION 



ONE PASS OF THE DQA MODULE CONSISTS OF 24576- CYCLES OF 
AH INCREMENTAL DATA PATTERN TRANSFERRED AT 15* CHARACTER 
BURSTS. 

EXECUTION TIME. 



RUNNING ALONE ON AN 11/20 ONE PASS TAKES APPROX- 
IMATELY 20 SECONDS, NOTE: PASS TIME IS DEPENDENT UPO^ BAUD RATE, 

CONFIGURATION REQUIREMENTS, 



DEFAULT PARAHETERS2 



DEVADRS 1 VECTOR: 1 BRlS 5 BR2: 5 DEVCNT: 1 
USER MUST SPECIFY THE ADDRESS AND VECTOR OF THE FIRST 
DQll AT CONFIGURATION TIME- 

6« DEVICE/OPTION SETUP 

NO SPECIAL SET NECESSARY, (BASIC UNIT TESTED ONLY) 
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7« HODULS DESCRIPTIOf^ 

k. TESTS FOR THE iVAILABILITY OF UP TO EIGHT DQ11^S 

B« INITIALIZES ALL DQll^S. SETS ACCQRDINLY^ 

C. SETS ALL GO BITS AMD LEAVES I^ODULE 

D« GETS TRANS. IflTEROPTS^ GETS ALL RECV« IMTERUPTS« 

E« CHECKS ALL STATUS REGISTERS AMD SECOMDARY REGISTERS 

F. CHECKS ALL DATA. REPORTS AMY ERROR FOUNd! 

G. PREPARES DATA TO TRANSNITTED AGAIN. 
H« REPEATS A THROUGH G 128 X 256 CHARS. 

J« REPORTS EMD PASS hUd CONTII^UES AS IBOVE» 

8« OPERATOR OPTIDKS 



A» MODULE LOCATION DVIDl MAY BE CHANGED TO 

EXERCISE km COMBIMATIOI^ Of DQllS. 8IT = DQ110 
BIT 1=DQ11 1. ...... BIT 7=D(ai 7« 

B. If D¥ID1 = AT RU^ TIME NO DQllS 'I^ILL BE EXERCISED^ 

9« iOl STANDARD PRINTOUTS 

UOHEZ ALL PRIMTOUTS HIVE THE STAI^DARO FORMAT* 

IF YOU MEED HELP IM RUNNING MODULE REFER TC DEC/Xll DOCU^ieMT. 
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000000* 
000000' 
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00006^ 
000066 

nmr- 

000074' 
000076' 
000100- 
000102' 
000102' 
000104' 
000104' 
000106' 
000106' 
000110' 
000112' 
000114' 
000116' 
000120' 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000000 

000000 

000000 

000000 

000332' 

000000 

000000 

000000 

000031 

000040 



,5, ,7100, 31 



. ***«««*****«; 



SEQ^LOCBIN 

<DQAI >/lfl/5,3^, 

140000, DQAT, 1,1/5, 5, ,7 100, 31 
DQAI DEC/Xll SYSTEM EXERCISER MODULE 
VERSION 6 23-MAY-78 
BIN 
************************************** 



/ ;mod 
;lST 



***************** 



r****** 



ULE N 
DEvf 

; 
; 

; 

**** 



ANE. 

USED TO KEEP TRACK OF WBUFF USAGE 

CE ADDR. 

1ST DEVICE VECTOR. 

1ST BR LEVEL. 

2ND BR LEVEL. 

DEVICE INDICATOR 1. 

SWITCH REGISTEH 1 

SWITCH REGISTER 2 

SWITCH REGISTER " 



******** 



********** 



;STATUS WORD, 

;MCDULE START ADDR. 

JMODULE STACK POINTER. 

;PASS COUNTER. 

;# OF ITERATIONS PER PASS=7100 

?LOC TO COUNT ITERATIONS 

;LOC TO SAVE TOTAL SOFT ERRORS 

;LOC TO SAVE TOTAL HARD ERRORS 

;LOC TO SAVE SOFT ERRORS PER PASS 

;LOC TO SAVE HARD ERRORS PER PASS 

;# OF SYS ERRORS ACCUMULATED 

;HOLDS RANDOh' # WHEN RAND MACRO IS CALLED 

JRESERVED FOR MONITOR USE 

?RESERVED FOR MONITOR USE 

;RESERVED FOR MONITOR USE 

;L0C TO SAVE RO. 

?LOC TO SAVE Rl. 

;L0C TO SAVE R2. 

;LOC TO SAVE R3. 

?LOC TO SAVE R4. 

;LOC TO SAVE R5. 

;LOC TO SAVE R6. 

JADDR OF CURRENT CSR, 

;ADDR OF GOOD DATA, OR 

;C0NT'=;NTS OF CSR. 

JADDR OF BAD DATA, OR 

;STATUS REG CONTENTS. 

;TYPE OF ERROR 

;EXPECTED DATA. 

;ACTUAL DATA. 

;RESTART ADDRESS AFTER END OF PASS 

JWORDS TO MEMORY PER ITERATION 

;WCRDS FROM MEMORY PER ITERATTCN 

;« OF INTERRUPTS PER ITERATION 

;MCDULE IDENTIFICATION NUMaEF=31 

;MODULE STACK STARTS HERE. 
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84 

85 
_86 
187 

88 000224- 
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.NLIST 

.WORD 

.LIST 

.ENOR 
MODSP: 
.********************** 



************************ 



********* 
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000010 177662 
177656 
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20- 
204 
205 
206 
207 
208 
209 

m 

212 
213 
214 
215 
216 
217 
218 
219 
220 

m 

223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 



057-. 
01363 
16767 

000324' 000402 



000326- 

nmr- 



mm 



000336- 
000342- 



mm- 

000360- 

mm- 

000366- 
000372- 
000376- 
000402- 
000404- 

000406- 
000412- 
000414- 
000416- 
000420- 



000422- 010320 



062702 
062703 
000766 
010320 

116720 
005200 
022323 
010223 
022322 



000424- 
000430- 
000432- 
000434- 
000436- 
000442- 



OOOOIQ 177616 
000010 177612 
000002 177606 



177472 002432 



010223 
062702 



OQOOOO- 
002421 



177440 
177432 
002174- 



000010 
000010 
000016 



116720 177362 

005200 

'"'132-' 



ASR 
BCC 
ASR 
BCC 
ADD 
ADD 
ADD 
TST 
BNE 
MOV 



DROP: 

ENDS 

hestpt: clrb 



MOV 

MOV 

MOV 

MOV 

BNE 1 

END$,BEGII 



9.,WDT0 
8-,MDFR 
2,TNTR 
VID1,R0 



RO 

U 

3$ 

B.,MDTO 

8.,WDFR 

2,INTR 

RD 

2$ 

DVIDl/SELECT 



rBEGIN 

SELECT+1 



MOV 
BEQ 

MOV 
MOV 
MOV 
ASR 
BCS 
BEQ 

ADD 

ADD 

ADD 

BR 

MOV 

MOVB 

INC 

CMP 

MOV 

CMP 

MOV 

MOVB 

INC 

CMP 

MOV 

ADD 

BR 




BR2/(R0)+ 

RO 

(R3)+,(R3)+ 

R2,(R3)+ 

(R3)*^(R2)+ 

R3/(R0)+ 

BR1,(R0)+ 

RO 

(R3)+,(R3)+ 

R2,(R3)4- 

|6,R2 



;8 WORDS TO MEM PER ITERATION 
;R WORDS FROM MEM PER ITERATION 
;2 INTERRUPTS PER ITFRATICN 
;SAVE DEVICE COUNT IN RO 
;RR if at LEAST ONE SELECTED 

;KILL 1ST DEV-ALRFADY COUNTED 
;L0OP TILL FOUND 
/SHIFT IN KEXT BIT 
;BR IF NO DEVICE HERE 

;douple ^ords 

;d0uble words from 

; double interrupts 

;any more devices ? 

;br if YES 

;COPY THE DEVICE SELECTION PARAMETEH 

;into select 

;if zero. no devices selected- 

;drop the module 

JDROP THE module 

;ELIMINATE IRRELEVANT BITS 

;C0PY SELECT INTO PI FDR SETUP 

;IF SELECT WAS ZERO/ GO DROP THE MODULE 

;IF SELECT WAS NOT ZERC, DO MODULE Pt^iOCESS 

;LOAD PO MITH FIRST VECTOR ADDRESS 

;L0AD R2 WITH FIRST DEVICE ADDRESS 

;POINT R3 TO BEGINNING CF JSR LINK TABLE 

;1S0LATE A LINE IN THE "C'BIT 

;IF SELECTED/GO SETUP ADDRESSES 

;IF NO MORE TO BE SELECTED, 

;G0 SET UP BUFFERS, QUEUES/ETC. 

;IF MORE/UPDATE ALL REGISTERS. .THE VECTOR 

/THE ADDRESS... 

;AND THE LINK TABLE POINTER 

;CHECK TO SEE IF OTHER DEVICES SELECTED 

;LOAD THE RECEIVE ROUTINE 

;POINTER IN THE PROPER VECTOR 

;LOAD THE RECEIVER BR LEVEL 

;update ro to next vectcp poundafy 

;update r3 to the csr insert location 

;load the rcv csr into linking table 

;update the pointer to nfxt tnstiuction ?,'j 

;point r2 to the transmitter csr 

;lqad the transmitter routine 

;pointer in the proper vector 

;lqad the transmit br level 

jupdate the vector pointer 

;update the link table pointer 

;load the transmit csr into linkimg table 

;update the address pointer 

;G0 set up next DEVICE 
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000444- 012767 




000720 
000726 



1052-- 
05302 

112761 

'32761 

01417 

112761 
005061 



002646- 001734 

002646- 001730 

002666' 001724 

002666' 001720 

002706' 001714 

"02706' 001710 
00154 



000020 
000017 
000017 



000030 
000006 



SETUP2: MOV 

MOV 

MOV 
MOV 
MOV 
MOV 

MOV 

MOV 

IS: CLR 

DEC 
BNE 

actvate:mov 

MOVB 

MOV 

MOV 



#XMTQUE/XMTQPI 
tfXMTQUE/XMTQPO 



#ERRQUEyE 
»108.,R4 



R4 
1$ 



002174 
002176 
002770' 
002154 



1$: 
2S: 
3$: 



000004 
000005 



000001 
000001 



SELECT, R 
RO/DONFL 
ADDR,R1 
#RCVBFO/ 

GETPAS, BEGIN/ VA 

MOV PA,RCVAD 

MOV |SY.NC,VA 

GETPAS/BEGIN, VA 

MOV PA/XMTAD 

CLC 

RDL EA 



ASR 

BCS 

BEQ 

ADD 

ADD 

BR 

CLRB 

MOV 



CLR 

INCB 

DEC 

BNE 

MOV 

MOVB 

BITB 

BEQ 



RO 

INITIAL 
#10, Rl 
l20,RCVADR 

5(R1) 

#20/R2 

PIT12,4(R1) 
|l40,5tRl) 




000005 5$: 



#30,5(R1) 
6(Rl) 



;SET UP transmit QUE ENTRY(TM) 

;POINTER 

;SRT UP TRANSMIT QUE RETRIEVAL 

;(DUT) POINTER 

;SET UP RECEIVER QUE POINTERS 

;SET UP ERROR QUE POINTERS 

;LOAD R4 WITH MUMBER OF PUFFER 

JLOCATIDNS TG BE CLEAPKO 

;BEGIN CLEARING BUFFERS AT THE 

;TRANSMIT BUFFER 

;ZERO EACH LOCATION AND PQIMT P3 TO 

;NEXT WORD 

;HAVF ALL LOCATIONS BEEN CLEARED? 

;IF NO/ CLEAR THE NEXT ONE 

JLOAD DEVICE SELECTION PARAMETER 

;SETUP TRANSFER COMPLETION FLAG 

;COPy THE BASE ADDRESS 

;GET THE PHYSICAL ADDRESS OF FIRST 

;RECFIVER BUFFER 

;GRT PHYSICAL ADDRESS FROM 16-PIT VA 

;SAVE RECEIVE BUFFER PHYSICAL ADDRESS 

;GET THE PHYSICAL ADDRESS OF TPAMSMITTt'^ SUFIEP 

;GET PHYSICAL ADDRESS FROM 16-BIT VA 

;SAVE TRANSMITTER BUFFEF PHYSICAL ADDRl-SS 

;BE SURE CARRY BIT IS CLEAR BEFORE ROTATIfJG PITS 

jaltgn the extended address bits im order 

;ta set bits 13 and 14 cf the reg/err 

;register 

;isolate device selection flag in "c" bit 

;if selected, go initiate transfer 

;if no more selected, go setup data 

/update pointer to next device address 

;update pointer to next receiver buffrp 

jphocess next device 

;clear secondary registers pointer 

;from reg/err register (bits b-u) 

;set count to 16. for secondary registfr 

;clearing 

;ENABLE extended bits HPITINGCREG/ERK PIT 12) 

ICLEAR BITS 16 AND 17 OF THE 
;SEC0NDARY register by clearing 13 
;AND 14 OF THE ERR/REG REGISTER 
;CLEAR a SECONDARY REGISTER 
;PaiNT TO NEXT SECONDAFY REGISTER 
;REDUCE COUNT. ARE ALL SIXTEEN DONE? 
;IF NO/GO DO NEXT ONE 

;SET UP COUNTER TO CLEAR CHAR. DETECT REGS. 
;IF YES/ CLEAR CHARACTFR DETECT RECISTFPS 
;IS -BB OPTION HERE ? 

;no dont clear iT/CLeamng it 
;k'ipes out high order bits. 
;select secondary register 10 
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000732' 112761 

UoliS- 00140; 

roViiv- mil 


000034 
000006 


000005 


MOVB 




BEQ 


000001 




DECB 






BGT 



000756' 112761 000012 000005 
000764* 052761 000040 000006 
000772' 112761 000020 000005 



001000' 
001006' 
001014' 



001042' 
001050' 



001054' 
001062' 



156761 
016761 
105261 

012761 
112761 
156761 

016761 
105261 

012761 
112761 



001770 
001746 
000005 

177761 
000022 
001734 



177755 
000031 



001070' 016761 001326 



001110' 
001114' 



105261 
012761 



Ifoll 



052711 000042 
000642 



7$; 



000005 
000006 



000006 
000005 
000005 



000006 
000005 



000006 
000006 



BISB 

MOV 

INCB 

MOV 

MOVB 

BISB 

MOV 
INCB 

MOV 
MOVB 



INCB 
MOV 



BIS 
BR 




EA,5(R1) 

RCVADR,6(R1) 

5(R1) 



,5(h) 



XMTADR,6(R1) 
5(R1) 

tt-19.#6(Rl) 
|31/5fRi) 

SYNC,6(R1) 

5(R1) 
ff40l6/6(Rl) 



«42,(R1) 
2$ 



;SELfiCT SECONDARY REG. 14 
;ARE ALL REGISTERS CLEAR? 



ySELECT THE NEXT PAIR OF CHARACTER DETECT REGIST 

;CLEAR 16. PAIRS OF REGISTERS 

;HIGH BYTE OF RECEIVER CSR 

;SELECT SECONDARY REGISTER 12 

;{MISCELLANEOUS REGISTER) 

;MASTER CLEAR THE DQll BY 

jsetting bit 5 of the misc. register 
*;enable extended memory bits 

; and select the recriver buss 

;address register (sec. reg.o) 

;set the ea bits 

;load address of receiver buffer 

;select the receiver byte count register 

;(secondary reg. 1) 

?set count for 15 characters 

;select the transmitter russ address register 

;sbt the ea bits 

;(secondary register 2) 

;load address of transmitter buffer 

;select the transmitter byte count prgi3tek 

;{secon0ary register 3) 

jldad transmission byte count 

;select the sync character register 

; (secondary register 11) 

yload the sync register with 

;t«o copies of the sync character 

;select the misc. register (reg. 12) 

;ENABLE TEST LOOP(BIT 3) AND 

;SELECT 9 BITS/CHARACTER (1000 IN BITS o-ll) 

;ENABLE RECEIVER INTERRUPT (0 IT 5) 

?AND STRIP SYNC(BIT 1) 

;ADJUST pointers for NEXT DEVICE 



001116' 
0011 

00 r 
001. _. 
001136' 



012701 
012702 

mm 

105267 
116721 
105267 
005302 
001364 

016700 001574 

016701 176620 
006200 



imp 



C02426' 

000017 

000026 

001635 
001631 
001625 



---410 

062701 000010 



001643 1$: 
5$: 



2$: 
3S: 



CMPB 

BNE 

INCB 

MOVB 

INCB 

DEC 

BNE 

MOV 

MOV 
ASR 
BCS 
BEQ 
ADD 



1XMTBUF,R1 
15.,R2 
26,DATA 

DATA 

DATA,(R1)+ 

DATA 

R2 

SELECT/RO 

ADDR,R1 
RO 

TMRSET 
|lO,Rl 



;POINT Rl TO BEGINNING OF TRANSMIT TEXT 

;USE R2 AS A LOOP COUNTER 

;IS THE DATUM THE SYNC CHARACTER? 

;IF NO, GO MOVE IT INTO THE TRANSMITTER BUFKFP 

;TF YES, SKIP IT. 

;USING DATA.BUILD A BINARY TEST PATTERN 

;SET DATA TO NEXT CHARACTER 

;REDUCE COUNT. HAVE 15 CHARACTERS BEEN N'HUi:.? 

;IF NO, CONTINUE BUILDING TEXT • 

;IF YES, BEGIN TRANSFERS 

;L0AD DEVICE SELECTION PARAMETER INTO RO 

;LOAD BASE ADDRESS TNTC Rl 

MSOLATE A LINE SELECTION FLAG IN "C" PIT 

;IF SELECTED GO START DEVICE 

;IF NO MORE SELECTED GO START WATCHDOG TTMtR 

JUPDATK ADDRESS POINTER 

;GQ START NEXT DEVICE 
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358 001202' 005211 

359 001204' 012761 000051 000002 



001212' 000770 
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INC 

MOV 



|PU 



51,2(R1) 



;START RECEIVER (BIT 0=GG PIT) 

;enable transmitter(bit O) Mm error i^jter- 

?RUPT(EIT 3) ANDTRANSMITTER INTEF- 

?RUPT(BIT 5) 

;Ga ADJUST POINTER TO NEXT DEVICE 



VM 14LH 

001222' 

oojIII' 

001224' 



012767 
005004 



m 8s 



001230' 104407 

001234' 105767 

001240' 001433 

001242' 005304 



000005 001544 



OOOOOO' 
OOOOOO' 
001536 



mfiiiii^ 00151 

252' 001363 



001254' 116765 OOlblb 
001260' 040367 001472 

001264' 006003 

001266* 103402 

001270' 005204 

001272' 000774 
001274' 010467 001104 



001300' 104420 OOOOOO' 002404' 
001306' 002367- 

001310' 104403 OOOOOO' 002354' 

88iiJ5' 88!Z§^ """" 

001324' 104410 OOOOOO' 



TMRSET: 
timer: 


MOV 
CLR 


|5,TMRCNT 


BREAKS, BEGIN 
BREAKS, BEGIN 
TSTB DDNFLG 




BEQ 
DEC 
BNE 
DEC 
BNE 
MOVB 


FINISH 
R4 

THRCNT 

D0NFLG,R3 




BIC 


R3, SELECT 


is: 


ROR 


R3 




BCS 


2$ 




INC 


R4 


2$: 


MOV 


ALmmhi 



;TEMP0RARY RETURN TG MONITOR.... 
;THEN CONTINUE AT NEXT INSTRUCTION. 

;IF DONFLG IS CLEAR, EACH SELECTED DEVICt WA 

;SUCCESSFUL 

;TF SO PERFORM ENDPASS HOUSEKEEPING 

;IF NOT, REDUCE COUNT AND BREAK AGAIN 

;BREAK IF COUNT NOT EXCEEDED 

yreduce timing factor 

;break again if no timeout 

MF timeout occurred, SAVE PRESENT FLAGS 

; in R3 

;USE R3 TO DEACTIVATE HUNG DEVICE 

;BY CLEARING ACTIVE SELECTION FLAG FROM 

;dev1ce selection parameter 

;determine which line was 

;bad for reporting purposes 

;if this is the line, r4 contains correct 

;line number., .go report it 

mf not, increment r4, which was initially 

?0 from the previous loop 



l***i************ 



Ht******** 



OTOAS, BEGIN, NUMB Al, Ml 
• «**«*** ***«**««-»****i 
HSGN$, BEGIN, HUNG 
TST SELECT 
BNE FINISH 

ENDS, BEGIN 



;CONVERT NUMBAl TO ASCII AND 
JSTORE AT Ml 



************** ftik ******** ***************** 

;ASCII MESSAGE CALL WITH COMMON HEADER 

;ARE THERE ANY DRIVES REMAINING? 
?IF YES, REDUCE COUNT AND CONTINUE 
;IF NOT, DROP THE MODULE 



001330' 

001330' 104413 000000* 

001334* 000167 177104 



ENDITS, BEGIN 



;SIGNAL END OF ITERATION. 
;M0NIT0R SHALL TEST END OF PASS 
;START NEXT TRANSFER 



001340* 010577 001042 



XMTINT: MOV 



R5,8XMTQPI 



;LOAD THE OFFSET TO THE CSR INTO TRANSMITTER QUE 
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001352' 
001360' 

001375' 



HI 



062767 
022767 
001003 

012767 
012605 



017701 
062767 
022767 

mm 

002017 
010067 
011067 
016067 



001470' 
001472' 
001476' 
001502' 



005004 
105067 
042710 
104400 



000002 
002666' 



001372' 000004 000000' 



001004 
000002 
002666' 

002646' 

000002 

176434 
176432 
000002 
176424 



001462' 104405 000000' 



001034 
001026 



001016 

001400' 

000776 
000770 

000760 



176426 
000000 



001300 
000001 
000000' 



ADD 

CMP 
BNE 

MOV 
MOV 



1$: 



p,XMTQPI 
|XMTQUE+20/XNTQPI 

#XMTQUE,XMTQPI 
(SP)+,R5 



;update the queue ehtpy pointer 

;has the queue boundap\ been exceeded? 

mf it has not exceeded the boundary/ 

;go defer service to level o 

jif it has, update the pointer 

;restore the previous r5 value frdh stack 



^IRQS, 

Sov 

ADD 
CMP 
BNE 
MOV 
MOV 
TST 
BGE 
MOV 
MOV 
MOV 
CLR 

fiRDERS 

CLR 
CLRB 
BIC 
EXITS/ 



BEGIN/XMTSRV 



QUEUF UP TO CONTINUE AT XMTSRV AND RTI 



eXMTQPO/Rl 
|2/XMTQPa 
fXMTQUE +20 

rXMTQUE/XHTQ 

(RIKRO 

2(R0) 

RO/CSRA 
(RO)-ACSR 



mi 



• ******* 



2(R0)/ASTAT 

ERRTYP 

************ 



-BEGIS/NULL 
************* 

R4 

DONFLG 
pITO/(RO) 
BEGIN 



; FETCH THE OFFSET FROM THE QUEUE 
;UFDATE THE QUEUE HETRIFVAL POINTER 

XMTQPQ ;HAS THE QUEUE BOUNDARY BEEN EXCEEDED? 
;IF NO, GO PROCESS INTFPPUPT 

PO ;IF YES, RESET POINTER TO BEGINNING OF QUEUE 

;L0AD THE CSR ADDRESS If^TO RO 

;1F THERE liiAS AN ERROR, BIT 15 OF RLG/ERR IS SET 
MF NO ERROR, PROCESS THF INTERRUPT 
}0n ERROR, LOAD THE DEVICE ADDRESS INTO CSRA 
;LOAD THE CONTENTS INTO ACSR 
;LOAD THE RFGISTEP/BRPCP REG. INTO STATC 
UNKNOWN ERROR 
*************************************** 

ERROR FLAG SET-CONTENTS OF REG. ERR IN STATC 
*************************************** 

;COMPENSATE FOR PRINT DELAY ON TIMFR 



001506' 010577 



001512 
001520 
001526' 
001530' 
001536' 



062767 
022767 
001003 
012767 
012605 



000700 
000002 
002706' 



000672 
000664 



002666' 000654 



001540' 000004 000000' 001546' 



001566' 
"1570' 



00 
00 
00 
00 
00 
00 
00. 
001 



552' 
560' 



576' 
600' 
604' 
606' 
612' 
616' 
624' 



001630' 
001636' 



017700 
062767 
022767 
' 001003 
012767 
011001 
005761 
002014 
010167 
011167 
016167 
005067 

104405 

122711 



000642 
000002 
002706' 

002666' 

000004 

176266 
176264 
000004 
176256 

000000' 

000246 



000634 
000626 



176260 
000000 



is: 



2$: 



MOV 
ADD 

CMP 
BNE 
MOV 
MOV 



R5/gRCVQPI 

#2/KCVQPI 

|rCVQUE+20/RCVQPI 

«RCVQUE,RCVQPI 
(SP)+/R5 



^IRQS/BEGIN/RCVSRV 



MOV 
ADD 
CMP 
BNE 
MOV 
MOV 
TST 
BGE 
MOV 
MOV 
MOV 
CLR 
.*** 

HRDE 

6mp 



@RCVQPO,R0 

#2,RCVQP0 

ttRCVQUE+20/RCVgpO 

#RCVQUE/RCVQPO 

2$ 

R1,CSRA 
(R1),ACSR 
4(RI),ASTAT 
ERRTYP / 

******************** 



;ENTER OFFSET INTO RECFIVER QUEUb 
;UPDATE THE RECEIVER ENTRY POINTER 
;HAS THE QUEUE BOUNDARY REEi^ EXCEEDED? 
;IF KOT,COf'TINUE PRDCESFING 
;IF SO/POINT POINTER TC QUEUE n£G[f:Nr!G 
;REST0RE PREVIOUS VALUE OF RS 



QUEUF UP TO CONTINUE AT RCVSRV AND HTl 



;RETRIEVE OFFSET FKOf< RECEIVER OUiiUE 

;UFDATF THE QUEUE POINTER 

;HAS THE QUEUE BOUNDARY PEEN EXCEEDED? 

;IF NOT, CONTINUE PROCESSING 

;IF SG, POINT POINTER TC QUEUE BSG IN'-'T'-JG 

;PLACE CSR ADDRESS IN Rl 

;WERE THERE ANY ERRORS(PIT 15 OF SEa/EF-P RP")? 

;IF NOT,CONTTNUE PROCESSING 

;TF so, load base address into CSRA 

;M0V£ contents OF CSR TO ACSR 

;LOAD REG/tRR REG. CONTFNTS IMTO STATC 

UNKNOWN ERRCR 

■-************************************* 



■^ 



R$, BEGIN, NULL /DQU ERROR FLAG SET-REG/ERR IN STATC 

************************************************************ 

#246/{Rl) ; 
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470 

471 

472 

473 

474 

475 

476 

477 

478 

479 

480 

481 

482 

483 

484 

485 

486 

487 

488 

489 

490 

491 

492 

493 

494 

495 

496 

497 

498 

499 

5 00 

501 

502 

5 03 

504 

505 

506 

507 

508 

509 

510 

S" 

5 

5 

5_. 

515 

516 

517 

518 

519 

520 

521 

522 

523 

524 

525 



001642' 
001644- 
001650' 
001654' 



001412 
010167 
011167 
012767 



001662' 104405 



001670' 
001676' 
001700' 
001"706' 
001712' 
001720' 



122761 
001416 
016167 
010167 
062767 
012767 



176230 
176226 

000017 176224 

000000' 000000 

000254 000002 

000002 176174 
176166 

000002 176160 

000020 176160 



BEQ 
MOV 
MOV 
MOV 
• **** 

HRDER 



3$: 



001726' 104405 000000' 000000 



002446' 001016 
000017 001014 
000002 




jUNKNOfeN RECEIVER CEROR 
********************************* 

;receiver status error 



;IF NO ERRCRS/BEGTN CONPARIMG DATA 
;LOAD TRANSMITTER STATUS INTO ACSR 
;LOAD STATUS REGISTER ADDRESS 

;RLTFR BASF ADDRESS TO SHOifi TRANS'UTTFR /OnFFS 
; UNKNOWN XMITTER ERROR 
********************************* 




m 



002046' 
002050' 
002052' 
002054' 
002056' 
002060' 
002064' 
002066' 
002072' 



010025 
010125 
010225 
010325 
010425 

nm 

012705 
010567 



002076' 104404 
002102' 016705 



000020 000774 



176046 
176040 
000350 



002706' 
000320 



000000' 
000312 



25: 
3S: 



MOV 
MOV 
MOV 
BEQ 

ADD 

DEC 

BR 

MOV 

MOV 

MOV 

CMPB 

BEQ 

MOV 

MOV 

Move 

MOVB 
MOV 
MOV 
MOV 



MOV 
MOV 
MOV 
MOV 
MOV 
CMP 
BLO 
MOV 
MOV 



PCVBFO/RCVADR 

il5.,0ATACT 

2(fiO),R2 



20/RCVADR 



RCVADR/R2 
«RCVBFO,RCVADR 
|XMTBUF,R3 
(R2)+/(R3)+ 



R1,CSRA 

(RI),ACSR 

-(R2)/AWAS 

-{R3)/ASB 

R2, MAS ADR 

R3,SBADR 

ERRaPI/R5 



R0/(R5)+ 
R1/(R5)+ 
R2/(R5)+ 
R3/(R5)4- 
R4/(R5)+ 
R5/#ERRQUE+20. 



iERRQUE,R5 
R5/ERRQPI 

•>..K« ************************* 

DATERS, BEGIN JDATA 

****************************** 

MOV ERR0P0/R5 



;REST0RE BASE VALU 
;LOAD THE NUMBER 
;L0AD THE LINE MUM 

;when r2 is 0,the 
;has been selected 
;if r2 is not 0,po 
; reduce the line 
;go see if the cop 
;load r2 with the 

;REST0RE BASE VALU 

;load p3 with the 
;match characters. 
;if yes, go froces 
;load the base add 
;lqad receiver csr 
;load the actual r 

;L0AD THE TRANSMIT 
?LOAD THE CHARACTE 
;LDftD THE CHARACTE 
;USING R5,L0AD THE 
;INT0 THE ERROR QU 
JDATA ERROR CALL. 
;CQNTENTS APE VALI 
;SAVE THF QUEUE OF 
;SAVE THE CSR AODR 
;SAVE THE PRESENT 
;SAVE THE CURRENT 
;SAVE THE TIMER CO 
;HAS THE POINTER E. 
;IF SO/DO NOT RESE 
;POINT POINTER TO 
;RESTORE ERROR QUE 
******************* 



OF RECEIVER fUFFi^RS 
F CHARACTERS TO PE ri-KCKr 
BER CF THIS DQll 
CORPFCT RECEIVER BUFpf-'R 



INT PC 
NUMBER 
RFCT P 
START 
£ OF R 
START 

ARE T 
S NEXT 
RESS T 

CONTE 
ECEIVF 
TED CH 
R RECE 
R TRAN 

PRESE 
EUE, U 
THIS A 
D 

FSET 
ESS 

RECEIV 
TRANSM 
UNTDCW 
XCEEDE 
T POIN 
BEGINN 

ENTRY 



VADR TO NEXT PUF 

BY 1 
UFFEP HAS FFi^N D 
OF THt: RECEIVER 

ecetvp:r bufff.rs 
of transmitter t 

If FY THE SAN^E? 

CHARACTE?^ 
NTO CSRA 
NTS INTO ACS! 
D CilAKACTER 
ARACTER 
IVED ADDRESS 
SMITTED ADDRF'SS 
NT VALUES OF THF 
NQUSUEING THEM A 
"SURES THAT THE 



PEP 
"TFP 

rjFF 



GTSTE 
R THE 

ISTER 



E BUFFER PlirirtR 
IT BUFFER POINT'^F 
N 

THE QUEUF fOUNC 
TSR 

ING OF QUEUE 
POINTER 



;L0AD R5 WITH ERRO 
;RETRIEVE/USING R5 



R QUEUE RETRIEVAL POIMTEP 
THE FOLLOWING FROM THE F 



) 



DQAI DEC/Xll SYSTEM EXERCISER MODULE 
XOQftlO.Pll 12-0CT-78 11:54 



M&CYU 30A{1052) 12-0CT~7e 16:30 PI^GE 13 




6S: 

4$: 



177040 
177200 



MOV 
MOV 
MOV 
MDV 
MOV 
CMP 
BLO 
MOV 
MOV 
CMPB 

DEC 
BGT 



+ ,R4 

ERRQlJE + 20. 




RCVDON: CLR 

MOV 
SEC 
1$: RDL 
DEC 
BGE 
BICB 



R3 

2(R0)/R2 

R3 
R2 

l| 

R3,D0NFLG 



LNKTAB: JSR 



JSR 


JSR 

1 

JSR 


JSR 

2 

JSR 


JSR 

3 

JSR 


JSR 

4 

JSR 


JSR 

5 



EXITS/BEGIN 

R5,RCVINT 



R5,XMTINT 
R5,RCVINT 

R5,XMTINT 
R5,RCVINT 

R5,XMT1NT 
R5,RCVINT 

R5,XMTINT 
R5,RCVINT 

R5,XMTINT 
R5,RCVINT 



;QOEUE, PLACING THEM IN THE CORPESPPNniNG Rt:GISTF 

;THE OFFSET.... 

;THE BASE ADDRESS.... 

;THE CURRENT RECEIVER BUFFER POINTER 

;THE CURRENT TRANSMITTER PUFFER POINTER 

;AND THE CORRECT TIMER VALUE 

;HAS THE POINTER EXCEEDED THE QUEUE BOUNDARY? 

;IF NOT, DO NOT RESET IT 

?IF SO, RESET THE POINTER TO QUEUE BEGINNTNH 

;RESTORE THE RETREIVAL POINTER 

;AUTDINCREHENT THE BUFFER POINTERS TO 

;PDINT TO THE CORRECT CHARACTER 

JREDUCE CHARACTER COUNT. ARE ALL 15 DONE? 

MF NO, DO NEXT CHARACTER 



;IF YES, SETUP R3 TO TURN OFF FLAG IN DQNFLG 
;F0R THIS LINE 

;load the line number into r2 

;ustng the carry bit, create a one-bit mask 

;point the mask to the next line 

;heduce the line number 

;if positive or 0, go shift bit again 

;if negative, the mask is correctly alignkd- 

;CLEAR the DONE BIT FOR THIS LINE 

;£XIT TO MONITOR. MODULE WATT FOP INTERRUPT. 

;LINK FOR RECEIVER 

;LINK FOR TRANSMITTER 
;LINK FOR RECEIVER 1 

;LINK FOR TRANSMITTER 1 
;LINK FOR RECEIVER 2 

?LINK FOR TRANSMITTER 2 
;LINK FOR RECEIVER 3 

yLINK FOR TRANSMITTER 3 
;LINK FOR RECEIVER 4 

?LINK FOR TRANSMITTER A 
;LINK FOR RECEIVER 5 



^^ 
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004567 177022 

000000 

004567 177162 

000000 

000006 

004567 177004 

000000 

004567 177144 

000000 

000007 

004567 176766 

000000 
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582 


002312' 


583 


002316' 


584 


002320- 


585 


002324' 


586 
587 


'oUlW- 


588 


002334; 


589 




590 


002343- 


591 


592 


iimr' 


593 


594 




595 


002354- 


596 


002356' 


597 


002360' 




002366' 




002367' 




'oum' 


601 






603 






002404' 




002406 
002410' 
002412' 


606 
607 


608 


002414' 


609 


002416' 
002420' 


610 


611 




612 


002422 


613 


002424' 




002426 


616 


mtn 


617 


002506 


III 

620 




621 


002606 




002626 


625 


002646 


ti'l 


umi 


628 




629 




630 


002762 


m 



002360' 

mm 

042504 
040 

000006 
040 
000 

002404' 

000000 
000000 
000000 
000000 
000000 
000000 
000000 

026 

026 

000010 



633 
634 
635 
636 
637 



000010 
OOOOIQ 
000010 
000010 
000010 
000010 



000010 
OOOOIQ 
000024 



000000 
000000 
000000 

000000 
OQOOOO 
000000 
000000 



044526 042503 



052510 043516 



026 
026 



HUNG: 
MESSAG: 



Ml: 

M2: 



NUMBAl: 
XMTQPI: 
XMTQPO: 
RCVQPI: 
RCVQPO: 
ERRQPI: 
ERRQPO: 

SYNC: 

XMTBUF: 
RCVBFO: 
RCVBFl: 
RCVBF2: 
RCVBF3: 
RCVBF4: 
RCVBFS: 
RCVBF6: 
RCVBF7: 



JSR 



JSR 



6 

JSR 



JSR 



7 

JSR 



MESSAG 

-1 

.ASCII 

.BLKB 
.ASCIZ 

.EVEN 

.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

.BYTE 
.BYTE 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKM 
.BLKW 
.BLKW 
.BLKW 



XMTQUE: 

rcvque: 
errque: 



SELECT: 

rcvadr: 
xmtadr: 

datact: 
tmrcnt: 
va: 
pa: 



R5,XMTINT 
R5,RCVINT 

R5,XMTINT 
R5,RCVINT 

R5,XMTINT 





OPEN 

OPEN 

OPEN 

OPEN 

OPEN 

OPEN 



.BLKW 
.BLKW 
.BLKW 



OPEN 
OPEN 
OPEN 

.WORD 
.WORD 
.WORD 
.WORD 



26,26 
26,26 



OPEN 
OPEN 
OPEN 
OPEN 



;LINK FOR TRANSMITTER 5 

;LINK FOR RECEIVER 6 

;LINK FOR TRANSMITTER 6 

;LINK FOR RECEIVER 7 

;LINK FOP TRANSMITTER 1 



;POINTER FOR TRANSMITTER QUEUE INPUT 

;POINTER FDR TRANSMITTER QUEUE OUTPUT 

;POINTER FOR RECEIVER QUEUE INPUT 

;PQINTER FOR RECEIVER QUEUE OUTPUT 

;POINTER FOR ERROR QUEUE INPUT 

;POINTER FOR ERROR QUEUE OUTPUT 



;TRANSMITTER CHARACTER BUFFER 



;device 

;DEVICE 

;device 
;device 

JDEVICE 

;device 
;DEVICE 
/DEVICE 



RECEIVER BUFFER 
RECEIVER BUFFER 
RECEIVER BUFFER 
RECEIVER. BUFFER 
RECEIVER BUFFER 
RECEIVER BUFFER 
RECEIVER BUFFER 
RECEIVER BUFFER 



;TRAKSMITTER SERVICE QUEUE 
;RECEIVER SERVICE QUEUE 
;ERRDR SERVICE QUEUE 



;DEVICE SELECTION PARAMETER 
;PHYSICAL ADDRESS OF RECEIVER BUFFERS 
JPHYSICAL ADDRESS OF TRANSMITTER BUFFER 
;F0R all DEVICES 

;COUNTER FOR NUMBER OF DATA ITEMS 
;LOCATION for WATCHDOG TIMER FACTOR 
;LOCATTaN OF VIRTUAL ADDRESS PARAMETER 
;L0CATI0N of physical ADDRESS PARAMETER 
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638 
639 
6 40 
641 
642 



002774' 
002776' 
002777' 



000000 
000 
000 



EA: 

donflg: 

data: 



.WORD 
.BYTE 
.BYTE 
.EVEN 



;locatidn of extended addrrss ori's paravl 

;TRANSFER COMPLETION FlAG 
;USED TO nUILO TEST FATTFRN 



3 
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000056R 
""010"- 



104411 



ENDS 
ERRQP 



002776R 
000326R 
000014R 
002774R 



I 02416R 
002420R 
E 0Q2706R 
P 000106R 
= 104400 

1= 104414 
T 000044R 
S= 104405 
S 000050R 
Q02354R 
000036R 



172# 


432* 


463* 


472* 


479* 


503* 




263 














38 


218 


265 


352 








90 














76 


505* 












74 


433* 


464* 










77 


504* 












35 




210 


268 


271 


368 


369 


441 


452 


467 


475 


484 


522 


552 


90 


440 












90 














90 














n 


287 












90 














90 














90 














90 














90 














90 














90 


311 












90 














90 














90 














li 


m 


369 










40 












41 


230 












90 














90 














78 


489# 












w 














431* 


462* 


m* 


480* 
640# 


481* 


502 




345* 
538* 


346 

63 4 # 






w 














M 


377 


439* 


550* 


63 9 # 




p 
















205 










Hi 


322 
210^ 


638fr 
400 












nu 








53* 


11* 


465* 








Ik 


Dh 


m* 


53 4 


627. 


44 


552 










72 


11 


403# 
271 
























55« 














96 
52# 


436 


467 


475 


484 






595# 













i 
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) 



mm 

024646 
104417 
000054R 
002760R 
002446R 
002466R 

002546R 
002566R 
002606R 
002626R 
002146R 
001506R 
002412R 
002414R 
002666R 
001546R 



279 

i?P 

219 

190# 

595 

13 6# 

150 

600|( 
190| 
389* 
137 

Wo 

151f 

19 of 

190f 

190| 

190| 

190| 

190S 

190| 

19 of 

190# 

140 

190# 

190| 

1908 

190| 

190| 

19 oS 

190l 

159| 

266 

616# 

6171 

6181 

6198 

620| 

543| 
445| 

250 
452 



3411 

ml 

597fr 



III 




475 
145 


484 
146 

in 


163 
180 
635 


164 
181 
636 


63 7 # 











281* 
489 



554 

251 
454» 



16b 


166 


167 


168 


169 


170 


190# 


605 


606 


607 


608 


609 


637 


638 


639 









489* 
615# 



559 


564 


569 


574 


579 


446* 


447 


449* 
458* 


607# 
6081 




455* 


456 




447 


449 


456 


458 


62 6 
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178 207 

161# 

162l 

1781 

17l| 507* 

ml ^"* 

222 246# 

\UI 
156| 
150| 

l| 183 
143| 

-45| 
146# 
"49 190# 

63i 

64| 

65| 

_66i 

1673 

661 

-69i 

270 330 
158# 

3661 376 
365* 375* 

1738 506* 

180| 191* 

179| 190* 
137| 

272* 324 

256 341 

413# 557 

246* 413* 

248* 423 

246 248 

421 423# 

599f 602| 
6271 
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211# 



397 630# 



612# 
635» 



632# 








499 


iJl« 


572 


577 




415 


418* 


605 


iir 


427* 


606 


418 


425 


427 



615# 



616« 



582 587 592 

625» 

618rt 619# 620# 621ff 622ff 625« 626« 



000000 
003000 



000 
001 



ERRORS DETECTED: 
DEFAULT GLOBALS GENERATED: 



i^..«^, >m 
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xdqaio,xdqaio/sol/crf:sym=ddxcom,xdqaio 

RUN-TIME: 12-3 SECONDS 
RUN-TIME RATIO: 15/4=3-2 
CORE used: 7K (13 PAGES) 
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1 



